home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 051-075 / disk_052 / mxgads / mxgads.c < prev   
C/C++ Source or Header  |  1992-05-06  |  7KB  |  378 lines
  1. /** testmxgads.c
  2. *
  3. *   This program gives a demonstration of how to make mutual exclusion
  4. *   of boolean gadgets work even if they contain GadgetText.
  5. *   The method is still somewhat of a cludge, but then, it will last
  6. *   until 1.3 comes out... Hope this proves of some use.
  7. * 
  8. *                                       Willy.
  9. *
  10. *   The usual disclaimer:
  11. *
  12. *               Copyright 1986,  W.G.J. Langeveld
  13. *
  14. *   Permission is granted for unlimited commercial and/or noncommercial
  15. *   use. This program  may  not  be uploaded  to  any   commercial  BBS
  16. *   except Byte Information Exchange. The author accepts no responsibi-
  17. *   lity for this program whatsoever.
  18. *
  19. **/
  20.  
  21.  
  22. #include "exec/types.h"
  23. #include "exec/io.h"
  24. #include "exec/memory.h"
  25. #include "libraries/dos.h"
  26. #include "intuition/intuition.h"
  27. #include "functions.h"
  28.  
  29. /* The following source fragment was generated by PowerWindows */
  30.  
  31. SHORT BorderVectors1[] = {0,0,48,0,48,14,0,14,0,0};
  32. struct Border Border1 = {
  33.    -2,-1,
  34.    3,0,JAM1,
  35.    5,
  36.    BorderVectors1,
  37.    NULL
  38. };
  39.  
  40. struct IntuiText IText1 = {
  41.    1,0,JAM2,
  42.    6,3,
  43.    NULL,
  44.    (UBYTE *)"Quit",
  45.    NULL
  46. };
  47.  
  48. struct Gadget Gadg5 = {
  49.    NULL,
  50.    89,51,
  51.    45,13,
  52.    GADGHCOMP,
  53.    RELVERIFY,
  54.    BOOLGADGET,
  55.    (APTR)&Border1,
  56.    NULL,
  57.    &IText1,
  58.    0,
  59.    NULL,
  60.    7,
  61.    NULL
  62. };
  63.  
  64. SHORT BorderVectors2[] = {0,0,48,0,48,14,0,14,0,0};
  65. struct Border Border2 = {
  66.    -2,-1,
  67.    3,0,JAM1,
  68.    5,
  69.    BorderVectors2,
  70.    NULL
  71. };
  72.  
  73. struct IntuiText IText2 = {
  74.    3,0,INVERSVID,
  75.    7,3,
  76.    NULL,
  77.    (UBYTE *)"Four",
  78.    NULL
  79. };
  80.  
  81. struct Gadget Gadg4 = {
  82.    &Gadg5,
  83.    166,18,
  84.    45,13,
  85.    GADGHCOMP,
  86.    GADGIMMEDIATE,
  87.    BOOLGADGET,
  88.    (APTR)&Border2,
  89.    NULL,
  90.    &IText2,
  91.    0,
  92.    NULL,
  93.    6,
  94.    NULL
  95. };
  96.  
  97. SHORT BorderVectors3[] = {0,0,48,0,48,14,0,14,0,0};
  98. struct Border Border3 = {
  99.    -2,-1,
  100.    3,0,JAM1,
  101.    5,
  102.    BorderVectors3,
  103.    NULL
  104. };
  105.  
  106. struct IntuiText IText3 = {
  107.    2,0,INVERSVID,
  108.    2,3,
  109.    NULL,
  110.    (UBYTE *)"Three",
  111.    NULL
  112. };
  113.  
  114. struct Gadget Gadg3 = {
  115.    &Gadg4,
  116.    114,18,
  117.    45,13,
  118.    GADGHCOMP,
  119.    GADGIMMEDIATE,
  120.    BOOLGADGET,
  121.    (APTR)&Border3,
  122.    NULL,
  123.    &IText3,
  124.    0,
  125.    NULL,
  126.    5,
  127.    NULL
  128. };
  129.  
  130. SHORT BorderVectors4[] = {0,0,48,0,48,14,0,14,0,0};
  131. struct Border Border4 = {
  132.    -2,-1,
  133.    3,0,JAM1,
  134.    5,
  135.    BorderVectors4,
  136.    NULL
  137. };
  138.  
  139. struct IntuiText IText4 = {
  140.    1,0,JAM1,
  141.    9,3,
  142.    NULL,
  143.    (UBYTE *)"One",
  144.    NULL
  145. };
  146.  
  147. struct Gadget Gadg1 = {
  148.    &Gadg3,
  149.    10,18,
  150.    45,13,
  151.    GADGHCOMP+SELECTED,
  152.    GADGIMMEDIATE,
  153.    BOOLGADGET,
  154.    (APTR)&Border4,
  155.    NULL,
  156.    &IText4,
  157.    0,
  158.    NULL,
  159.    4,
  160.    NULL
  161. };
  162.  
  163. SHORT BorderVectors5[] = {0,0,48,0,48,14,0,14,0,0};
  164. struct Border Border5 = {
  165.    -2,-1,
  166.    3,0,JAM1,
  167.    5,
  168.    BorderVectors5,
  169.    NULL
  170. };
  171.  
  172. struct IntuiText IText5 = {
  173.    3,0,JAM2,
  174.    8,3,
  175.    NULL,
  176.    (UBYTE *)"Two",
  177.    NULL
  178. };
  179.  
  180. struct Gadget Gadg2 = {
  181.    &Gadg1,
  182.    62,18,
  183.    45,13,
  184.    GADGHCOMP,
  185.    GADGIMMEDIATE,
  186.    BOOLGADGET,
  187.    (APTR)&Border5,
  188.    NULL,
  189.    &IText5,
  190.    0,
  191.    NULL,
  192.    3,
  193.    NULL
  194. };
  195.  
  196. struct NewWindow NewWindowStructure = {
  197.    351,39,
  198.    220,70,
  199.    0,1,
  200.    GADGETDOWN+GADGETUP+CLOSEWINDOW,
  201.    WINDOWDRAG+WINDOWCLOSE+ACTIVATE,
  202.    &Gadg2,
  203.    NULL,
  204.    (UBYTE *)"Mutual Exclude Test",
  205.    NULL,
  206.    NULL,
  207.    5,5,
  208.    640,200,
  209.    WBENCHSCREEN
  210. };
  211.  
  212. /* end of PowerWindows source generation */
  213.  
  214. #define GAD1 4
  215. #define GAD2 3
  216. #define GAD3 5
  217. #define GAD4 6
  218. #define GAD5 7
  219.  
  220. struct IntuitionBase *IntuitionBase = 0L;
  221.  
  222. struct Window *twindow;
  223. void GadMXSel(), GadMXSD();
  224.  
  225. main()
  226. {
  227.    IntuitionBase = (struct IntuitionBase *) 
  228.                     OpenLibrary("intuition.library", 0L);
  229.    if (IntuitionBase == NULL) {
  230.       printf("Failed to open intuition\n");
  231.       exit();
  232.    }
  233.  
  234.    Test();  /* Do the work: put up a "requester" */
  235.  
  236.    if (IntuitionBase != NULL) CloseLibrary(IntuitionBase);
  237.    return(0);
  238. }
  239.  
  240. /**
  241. *
  242. *   Routine to put up the "Requester" and handle IDCMP messages.
  243. *
  244. **/
  245. Test()
  246. {
  247.    static ULONG class;
  248.  
  249.    static struct IntuiMessage *message;
  250.    static struct Gadget *gad;
  251.    static int looping;
  252.  
  253.    twindow = OpenWindow(&NewWindowStructure); /* open the "Requester" */
  254.    if ( twindow == NULL ) {
  255.       printf ("open window failed\n");
  256.       return;
  257.    }
  258.  
  259.    looping = TRUE;
  260.    while (looping) {
  261.       WaitPort(twindow->UserPort);
  262.       while((message = (struct IntuiMessage *)
  263.                        GetMsg(twindow->UserPort)) != NULL) {
  264.          class = message->Class;
  265.          gad = (struct Gadget *)message->IAddress;
  266.          ReplyMsg(message);
  267.  
  268.          if (class == CLOSEWINDOW) looping = FALSE;
  269.  
  270.          if ((class == GADGETUP) || (class == GADGETDOWN)) {
  271.             switch (gad->GadgetID) {
  272.                case GAD5 :
  273.                   printf("QUIT\n");
  274.                   looping = FALSE;
  275.                   break;
  276.                case GAD1 :
  277.                   printf("ONE\n");
  278.                   GadMXSel(twindow,&Gadg1,&Gadg2,&Gadg3,&Gadg4,NULL,NULL);
  279.                   break;
  280.                case GAD2 :
  281.                   printf("TWO\n");
  282.                   GadMXSel(twindow,&Gadg2,&Gadg1,&Gadg3,&Gadg4,NULL,NULL);
  283.                   break;
  284.                case GAD3 :
  285.                   printf("THREE\n");
  286.                   GadMXSel(twindow,&Gadg3,&Gadg1,&Gadg2,&Gadg4,NULL,NULL);
  287.                   break;
  288.                case GAD4 :
  289.                   printf("FOUR\n");
  290.                   GadMXSel(twindow,&Gadg4,&Gadg1,&Gadg2,&Gadg3,NULL,NULL);
  291.                   break;
  292.             }
  293.          }
  294.       }
  295.    }
  296.    CloseWindow(twindow);
  297.    return;
  298. }
  299.  
  300. /**
  301. *
  302. *   This routine selects gad1 and deselects the previously selected one.
  303. *   Maximum number of gadgets to be mutually excluded is six, obviously.
  304. *   Extension to more gadgets is obvious, too. This routine assumes that
  305. *   only one gadget is selected at a time.
  306. *
  307. **/
  308. void GadMXSel(win,gad1,gad2,gad3,gad4,gad5,gad6)
  309. struct Window *win;
  310. struct Gadget *gad1,*gad2,*gad3,*gad4,*gad5,*gad6;
  311. {
  312.    static struct Gadget *gadprev;
  313.  
  314.    gadprev = NULL;
  315.    if (gad1 != NULL)
  316.       if (gad1->Flags & SELECTED) return;
  317.    if (gad2 != NULL)
  318.       if (gad2->Flags & SELECTED) gadprev = gad2; 
  319.    if (gad3 != NULL)
  320.       if (gad3->Flags & SELECTED) gadprev = gad3;
  321.    if (gad4 != NULL)
  322.       if (gad4->Flags & SELECTED) gadprev = gad4;
  323.    if (gad5 != NULL)
  324.       if (gad5->Flags & SELECTED) gadprev = gad5;
  325.    if (gad6 != NULL) 
  326.       if (gad6->Flags & SELECTED) gadprev = gad6;
  327.  
  328.    GadMXSD(win,gad1,gadprev);
  329.  
  330.    return;
  331. }
  332.  
  333. /**
  334. *
  335. *   This routine selects gad1 and deselects gad2.
  336. *   Notice, that this version removes gadgets from the gadget list and adds
  337. *   them to the end. If you're sensitive to the location of the gadgets
  338. *   in the gadgetlist, you have to use: gadloc = RemoveGadget... and
  339. *   AddGadget(...,...,(long) gadloc), where gadloc is a USHORT. Then you
  340. *   have to refresh all gadgets to make sure the two you changed get
  341. *   refreshed.
  342. *
  343. **/
  344. void GadMXSD(win,gad1,gad2)
  345. struct Window *win;
  346. struct Gadget *gad1,*gad2;
  347. {
  348. /*
  349. *   First select gad2 (yes!) and refresh.
  350. */
  351.    if (gad2 != NULL) {
  352.       RemoveGadget(win,gad2);
  353.       gad2->Flags |= SELECTED;
  354.       AddGadget(win,gad2,-1L);
  355.    }
  356.  
  357.    if (gad2 != NULL) RefreshGadgets(gad2,win,NULL);
  358. /*
  359. *   Now select gad1 and deselect gad2 and refresh.
  360. */
  361.    if (gad1 != NULL) {
  362.       RemoveGadget(win,gad1);
  363.       gad1->Flags |= SELECTED;
  364.       AddGadget(win,gad1,-1L);
  365.    }
  366.  
  367.    if (gad2 != NULL) {
  368.       RemoveGadget(win,gad2);
  369.       gad2->Flags &= ~SELECTED;
  370.       AddGadget(win,gad2,-1L);
  371.    }
  372.  
  373.    if (gad1 != NULL) RefreshGadgets(gad1,win,NULL);
  374.  
  375.    return;
  376. }
  377.  
  378.